home *** CD-ROM | disk | FTP | other *** search
/ The Trig Explorer / The Trig Explorer.iso / mac / Explorer / Ex_Funct.dxr / 00032.ls < prev    next >
Encoding:
Text File  |  1998-07-22  |  283 b   |  11 lines
  1. on exitFrame
  2.   global x, y, r, theta
  3.   puppetSprite(13, 0)
  4.   set the floatPrecision to 3
  5.   if (field "Answer1" > (x - 0.75)) and (field "Answer1" < (x + 0.75)) and (field "Answer2" > (y - 0.75)) and (field "Answer2" < (y + 0.75)) then
  6.     nothing()
  7.   else
  8.     go("CA1")
  9.   end if
  10. end
  11.